home *** CD-ROM | disk | FTP | other *** search
/ New York Yankees - Interactive Yearbook / New York Yankees: Interactive Yearbook.iso / pc / material / casts / common.cxt / 00109_Field_109.txt < prev    next >
Text File  |  1998-09-14  |  2KB  |  69 lines
  1. on mouseDown
  2.   global justclosemenu
  3.   put videoOn
  4.   if videoOn = 1 then turnoffvideo
  5.   
  6.   if the member of sprite 116 = member "baseball" and the clickOn <> 116 then
  7.     put 1 into justclosemenu
  8.     cleanup playTheMenu
  9.     set the volume of sound(1) = (whichKey*28)
  10.     set the volume of sound(2) = (whichKey*28)
  11.   end if
  12.   
  13.   
  14. end
  15.  
  16. on keyDown
  17.   put the visible of sprite 116
  18.   if the visible of sprite 116 <> 1 then
  19.     put value(the key) into whichKey
  20.     
  21.     if whichKey >= 0 and whichKey <=7 then
  22.       set the volume of sound(1) = whichKey * 28
  23.       --set the volume of sound(2) = whichKey * 28
  24.       set the soundlevel = whichKey
  25.     end if
  26.   end if
  27.   
  28.   
  29. on stopMovie
  30.   repeat with x = 1 to 120
  31.     set the visible of sprite x = 1
  32.   end repeat
  33.   set the visible of sprite 115 = 0
  34.   set the visible of sprite 117 = 0
  35. end
  36.  
  37.  
  38.  
  39. on turnoffvideo
  40.   
  41.   set the movieRate of sprite theQT = 0
  42.   set the movietime of sprite theQT = 0
  43.   
  44.   set the volume of sound(1) = (whichKey*28)
  45.   set the volume of sound(2) = (whichKey*28)
  46.   
  47.   set the visible of sprite theQT = 0
  48.   
  49.   set the visible of sprite (theQT - 1) = 0
  50.   
  51.   set the member of sprite theqt = "blank"
  52.   
  53.   puppetSprite theQT, false
  54.   
  55.   
  56.   puppetSprite (theQT - 1), FALSE
  57.   
  58.   updatestage
  59.   set the stageColor = the stageColor
  60.   
  61.   set the visible of sprite smallTV = 1
  62.   updatestage
  63.   set the stageColor = the stageColor
  64.   set theqt = 0
  65.   set videoOn = 0
  66.   puppetSound 1, (getAt(soundList, (random(7))))
  67.   
  68. end
  69.